home *** CD-ROM | disk | FTP | other *** search
- /* load a file into Textra */
- arg filename
-
- if ~show('l','rexxsupport.library') then
- if ~addlib('rexxsupport.library',0,-30) then
- exit 25
-
- if ~show('Ports', 'TEXTRA') then
- address command 'run >nil: <nil: Textra "'filename'"' / * start textra */
- else
- address 'TEXTRA' 'openfile' '"'filename'"'
-
-